Sub OctalTest()

	Dim foo As Long
	foo = &O55
	
End Sub